home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 41 / Amiga Format CD41 (1999-06)(Future Publishing)(GB)[!][issue 1999-07].iso / -seriously_amiga- / comms / other / magicfile / goodies / postupload.rx < prev   
Text File  |  1999-04-21  |  606b  |  33 lines
  1. /* 
  2.    MagicFile 4.3 script executed after uploads 
  3.   
  4.    Description
  5.    ----------- 
  6.    Executes the GET FILE DESCRIPTION code if local login.
  7.   
  8.    THIS SCRIPT CURRENTLY DOES NOT APPEAR TO WORK, IF IT FREEZES YOUR SYSTEM
  9.    PLEASE DO NOT USE IT. I don't know why it doesn't work either.
  10.     
  11.    Requires
  12.    --------
  13.    MAX's Pro 2.09
  14.    
  15.    Written by/Contact
  16.    ------------------
  17.    Steve Clack - steeevc@ndirect.co.uk - Total Eclipse BBS +44(0)1983 522428
  18. */
  19.  
  20. PARSE ARG PortName
  21. Address Value 'M2REXX' || PortName
  22. Options Results
  23.  
  24. GetUser 24
  25. CPS = rc
  26.  
  27. If CPS = 0 then do
  28.    GetFileDesc
  29. end
  30.  
  31. EXITDOOR
  32.  
  33.